home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
basic
/
deal2.zip
/
DEAL1.BAS
next >
Wrap
BASIC Source File
|
1991-11-10
|
145b
|
9 lines
'This program shuffles the 52 cards in a deck for dealing.
Type deck
value As Integer
num As Integer
numsuit As Integer
End Type